home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1993…ch: Other People's Memory / ADC Developer CD (1993-03) (''Other People's Memory'')_iso / Dev.CD Mar 93.iso / Development Platforms / LISP Related / LISP Goodies / McCartney-library 1.1 / Example / initialize.lisp < prev    next >
Encoding:
Text File  |  1992-09-02  |  248 b   |  16 lines  |  [TEXT/CCL2]
  1. (in-package :cl-user)
  2.  
  3. (defvar *sample-data*)
  4.  
  5. (load "Example;data")
  6.  
  7. ;;;;
  8. ;;;; Initialization
  9. ;;;;
  10.  
  11. (GW-extensions-init)
  12. (puv-init)
  13.  
  14. (let ((w (make-instance 'simple-scatter-plot :window-show nil)))
  15.   (add-data w *sample-data*)
  16.   (window-select w))